home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Run Magazine ReRun 1986 January & February
/
rerun-1986-01-02.d64
/
lister 64
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
5KB
|
74 lines
100 dev=4 : rem printer device number
110 loc=49152:line=1000
120 print"poking data from line"line:k=0:check=0
130 if loc>50148 then170
140 readn:pokeloc,n:loc=loc+1:check=check+n:k=k+1:ifk<16then130
150 read n:ifn=checkthenline=line+10:goto120
160 print"data statement error on line"line:end
170 read n:ifn<>checkthen160
180 poke 49250,dev
190 print"lister load successful.":print"sys 49152 to start":end
1000 data 162,0,189,140,195,240,6,32,210,255,232,208,245,32,228,255,2629
1010 data 240,251,201,83,208,11,141,232,195,169,147,32,201,194,76,120,2501
1020 data 192,201,80,208,232,141,232,195,32,210,255,32,199,194,162,0,2565
1030 data 189,177,195,240,6,32,210,255,232,208,245,162,61,169,0,157,2538
1040 data 254,195,202,169,32,157,254,195,202,208,250,32,207,255,201,13,2826
1050 data 240,8,157,254,195,232,224,60,208,241,169,1,141,244,195,169,2738
1060 data 3,162,4,160,255,32,186,255,169,0,32,189,255,32,192,255,2181
1070 data 162,3,32,201,255,32,91,194,165,43,133,251,165,44,133,252,2156
1080 data 198,251,169,0,141,233,195,169,6,141,236,195,173,233,195,208,2743
1090 data 39,160,0,169,0,141,230,195,141,245,195,141,234,195,141,246,2472
1100 data 195,141,229,195,162,3,177,251,208,3,238,230,195,200,202,208,2837
1110 data 245,173,230,195,201,3,208,7,32,199,194,32,231,255,96,177,2478
1120 data 251,141,242,195,200,177,251,140,253,195,141,243,195,162,0,32,2818
1130 data 67,194,32,195,194,169,2,141,246,195,172,253,195,200,177,251,2683
1140 data 208,23,140,253,195,32,74,195,173,253,195,24,101,251,133,251,2501
1150 data 169,0,101,252,133,252,76,140,192,170,173,245,195,208,43,138,2487
1160 data 201,177,144,25,201,180,176,21,41,127,141,251,195,173,239,195,2487
1170 data 208,3,32,195,194,169,1,141,239,195,76,139,193,173,239,195,2392
1180 data 240,3,32,195,194,169,0,141,239,195,138,201,58,208,23,173,2209
1190 data 245,195,240,4,169,58,208,43,32,195,194,169,58,32,201,194,2237
1200 data 32,74,195,76,221,192,138,201,34,208,13,173,245,195,73,255,2325
1210 data 141,245,195,169,34,76,232,193,201,32,208,13,173,245,195,240,2592
1220 data 0,169,32,32,201,194,76,221,192,201,128,176,3,76,232,193,2126
1230 data 173,245,195,208,115,138,41,127,141,251,195,201,2,208,9,173,2422
1240 data 236,195,56,233,2,141,236,195,32,195,194,162,0,140,253,195,2465
1250 data 160,0,236,251,195,240,14,185,158,160,201,129,144,4,232,200,2509
1260 data 208,240,200,208,242,185,158,160,201,129,144,54,41,127,32,201,2530
1270 data 194,173,239,195,208,22,173,251,195,201,35,240,15,201,38,240,2620
1280 data 11,201,52,144,4,201,75,144,3,32,195,194,173,251,195,201,2076
1290 data 1,208,9,173,236,195,24,105,2,141,236,195,172,253,195,76,2221
1300 data 221,192,32,201,194,200,208,189,32,201,194,76,221,192,169,48,2570
1310 data 141,231,195,173,242,195,56,237,240,195,141,242,195,173,243,195,3094
1320 data 237,241,195,141,243,195,144,5,238,231,195,208,230,24,173,240,2940
1330 data 195,109,242,195,141,242,195,173,241,195,109,243,195,141,243,195,3054
1340 data 173,231,195,201,48,208,9,173,234,195,208,7,169,32,208,6,2297
1350 data 141,234,195,173,231,195,32,201,194,169,0,141,237,195,174,252,2764
1360 data 195,232,232,189,217,195,201,42,208,1,96,142,252,195,141,240,2778
1370 data 195,232,189,217,195,141,241,195,76,238,193,173,254,195,201,64,2999
1380 data 240,96,32,199,194,162,0,189,133,195,240,6,32,210,255,232,2415
1390 data 208,245,162,0,189,254,195,240,6,32,210,255,232,208,245,162,2843
1400 data 0,189,211,195,240,6,32,210,255,232,208,245,169,0,174,244,2610
1410 data 195,140,253,195,32,205,189,172,253,195,32,199,194,162,0,189,2605
1420 data 133,195,240,6,32,210,255,232,208,245,162,67,169,45,32,210,2441
1430 data 255,202,208,248,32,199,194,32,199,194,169,5,141,238,195,238,2749
1440 data 244,195,96,169,32,208,2,169,13,140,247,195,142,248,195,141,2436
1450 data 235,195,201,32,208,17,205,237,195,240,67,173,237,195,201,40,2678
1460 data 240,60,173,246,195,208,55,173,246,195,240,38,174,236,195,201,2875
1470 data 2,240,4,138,76,251,194,138,56,233,6,141,230,195,141,229,2274
1480 data 195,240,12,169,32,32,210,255,206,230,195,208,246,169,0,141,2540
1490 data 246,195,173,235,195,141,237,195,32,210,255,238,229,195,32,228,3036
1500 data 255,208,2,240,30,169,128,141,249,195,141,250,195,206,249,195,2853
1510 data 208,251,206,250,195,208,246,32,228,255,240,251,201,81,208,3,3063
1520 data 141,233,195,172,247,195,174,248,195,96,32,199,194,173,232,195,2921
1530 data 201,80,208,43,173,229,195,201,80,144,8,238,238,195,169,0,2402
1540 data 141,229,195,238,238,195,173,238,195,201,62,144,18,173,254,195,2889
1550 data 201,64,240,11,162,5,32,199,194,202,208,250,32,91,194,169,2254
1560 data 1,141,246,195,96,32,32,32,32,32,32,0,147,79,85,84,1266
1570 data 80,85,84,32,84,79,32,80,82,73,78,84,69,82,32,79,1135
1580 data 82,32,83,67,82,69,69,78,32,40,80,47,83,41,63,32,980
1590 data 0,84,89,80,69,32,73,78,32,65,32,72,69,65,68,73,981
1600 data 78,71,32,70,79,82,32,69,65,67,72,32,80,65,71,69,1034
1610 data 58,13,0,80,65,71,69,32,0,16,39,232,3,100,0,10,788
1620 data 0,1,0,42,42,85